home *** CD-ROM | disk | FTP | other *** search
/ Chip 2011 November / CHIP_2011_11.iso / Programy / Inne / Gry / Carnage_Contest / scripts / CC Original / weapons / Napalm.lua < prev    next >
Text File  |  2010-07-20  |  2KB  |  49 lines
  1. --------------------------------------------------------------------------------
  2. -- Weapon Napalm
  3. -- Original Carnage Contest Weapon
  4. -- Script by DC, August 2009, www.UnrealSoftware.de
  5. --------------------------------------------------------------------------------
  6.  
  7. -- Setup Tables
  8. if cc==nil then cc={} end
  9. cc.napalm={}
  10. cc.napalm.cluster={}
  11.  
  12. -- Load & Prepare Ressources
  13. cc.napalm.gfx_wpn=loadgfx("weapons/rc.bmp")                                -- Weapon Image
  14. setmidhandle(cc.napalm.gfx_wpn)
  15. cc.napalm.gfx_icon=loadgfx("weapons/napalm.png")                        -- Weapon Icon
  16. setmidhandle(cc.napalm.gfx_icon)
  17. cc.napalm.sfx_attack=loadsfx("airstrike.ogg")                            -- Attack Sound
  18.  
  19. --------------------------------------------------------------------------------
  20. -- Weapon: Napalm
  21. --------------------------------------------------------------------------------
  22.  
  23. cc.napalm.id=addweapon("cc.napalm","Napalm",cc.napalm.gfx_icon,1,2)        -- Add Weapon (1 use, first in round 2)
  24.  
  25. function cc.napalm.draw()                                                -- Draw
  26.     setblend(blend_alpha)
  27.     setalpha(1)
  28.     setcolor(255,255,255)
  29.     drawinhand(cc.napalm.gfx_wpn,7,0)
  30.     -- HUD Positioning
  31.     if weapon_shots==0 then
  32.         hudpositioning(pos_invisible)
  33.     end
  34. end
  35.  
  36. function cc.napalm.attack(attack)                                        -- Attack
  37.     if (weapon_shots<=0) and (weapon_position==1) then
  38.         -- No more weapon switching!
  39.         useweapon(0)
  40.         playsound(cc.napalm.sfx_attack)
  41.         weapon_shots=weapon_shots+1
  42.         -- Attack
  43.         for i=-3,3,1 do
  44.             createobject(o_fire,weapon_x+i*17,-100)
  45.         end
  46.         -- End Turn
  47.         endturn()
  48.     end
  49. end